﻿Public Class Pais

    'TODO HACER PROPIEDADES

#Region "Declaraciones"
    Private cId As Integer
    Private cNombre As String
    Private cNacionalidad As String
    Private cProvincias As New Generic.List(Of Provincia)
#End Region

#Region "Constructores"
    Public Sub New()
        cId = -1
        cNombre = ""
        cNacionalidad = ""
        cProvincias = Nothing
    End Sub

    Public Sub New(ByVal pId As Integer, ByVal pNombre As String, ByVal pNacionalidad As String, ByRef pProvincias As Generic.List(Of Provincia))
        cId = pId
        cNombre = pNombre
        cNacionalidad = pNacionalidad
        cProvincias = pProvincias
    End Sub
#End Region

#Region "Propiedades"
    Public Property Id()
        Get
            Return cId
        End Get
        Set(ByVal value)
            cId = value
        End Set
    End Property

    Public Property Nombre()
        Get
            Return cNombre
        End Get
        Set(ByVal value)
            cNombre = value
        End Set
    End Property

    Public Property Nacionalidad()
        Get
            Return cNacionalidad
        End Get
        Set(ByVal value)
            cNacionalidad = value
        End Set
    End Property

    Public Property Provincias()
        Get
            Return cProvincias
        End Get
        Set(ByVal value)
            cProvincias = value
        End Set
    End Property
#End Region

End Class
